home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / x2ftp / msdos / ai / gaf200b / example / heattank.sim < prev    next >
Text File  |  1994-09-27  |  1KB  |  69 lines
  1. !--------------------------------------------------------
  2. ! Water tank heat control simulation
  3. ! Assume constant volume (i.e. water in = water out)
  4. !--------------------------------------------------------
  5.  
  6. FEEDBACK TankTempSim
  7.  
  8. CYCLE_TIME    1.0
  9.  
  10. !     Name        MIN   MAX
  11. IN    Temperature(32.0, 212.0)
  12. IN    Gas_valve  (0.0, 10.0)
  13. OUT   Temp_error (-180.0, 180.0)
  14. OUT   Target_temp(32.0, 212.0)
  15. OUT   TempWaterIn(32.0, 212.0)
  16. OUT   Heating    (0, 1)
  17. INOUT Water_out  (0.0, 1.0)
  18.  
  19. Initialization
  20.     Target_Temp = 180;
  21.     Water_out = 0.2; !0.05; 
  22.     Temp_error = 0;
  23.     TempWaterIn = 80;
  24.     Heating = 1;
  25. PRE_PROCESSING
  26.     Temp_error = Temperature - Target_temp;
  27.     IF Heating = 1 THEN
  28.         IF ( Temp_error > -1.0 ) AND ( Water_out < 0.3 ) THEN
  29.             Heating = 0;
  30.         ENDIF;
  31.     ELSE
  32.         IF Temp_error < -5.0 THEN
  33.             Heating = 1;
  34.         ENDIF;
  35.     ENDIF;
  36. END;
  37.  
  38. PRESET ! 1
  39.     Target_Temp = 180;
  40.     Heating = 1;
  41.     Water_out = 0; !0.3; 
  42. END;
  43.  
  44. PRESET ! 2
  45.     Target_Temp = 180;
  46.     Heating = 1;
  47.     Water_out = 0.1; !0.5; 
  48. END;
  49.  
  50. PRESET ! 3
  51.     Target_Temp = 180;
  52.     Heating = 1;
  53.     Water_out = 0.4; !0.7; 
  54. END;
  55.  
  56. PRESET ! 4
  57.     Target_Temp = 180;
  58.     Heating = 1;
  59.     Water_out = 0.6; !0.8; 
  60. END;
  61.  
  62. PRESET ! 5
  63.     Target_Temp = 180;
  64.     Heating = 1;
  65.     Water_out = 1; !0.9; 
  66. END;
  67.  
  68. END TankTempSim;
  69.